home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_11_1986_Transactor_Publishing.d64 / dvorak fig 2 (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  1KB  |  33 lines
  1. 1 rem *** dvorak keyboard/maple/fig 2
  2. 4 open4,4:cmd4:cr$=chr$(8)+chr$(13)+chr$(15)
  3. 5 printchr$(14)
  4. 6 print"  [176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"chr$(8)+chr$(13)+chr$(14);
  5. 7 print"  [221] word occurrence table [221]"chr$(8)+chr$(13)+chr$(14);
  6. 8 print"  [173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]
  7. 9 [153][199](15):[153]:x$[178]"                "
  8. 10 [153]x$[170]"ortantantantantantantan=tantantantantantantan=tantantantantantantan^"cr$;
  9. 20 [153]x$[170]"(NULL) place (NULL) word  (NULL) 3lettr(NULL)"cr$;
  10. 30 [153]x$[170]"-tantantantantantantan(NULL)tantantantantantantan(NULL)tantantantantantantan<"cr$;
  11. 40 [153]x$[170]"(NULL)   1   (NULL) the   (NULL) the   (NULL)"cr$;
  12. 50 [153]x$[170]"-tantantantantantantan(NULL)tantantantantantantan(NULL)tantantantantantantan<"cr$;
  13. 60 [153]x$[170]"(NULL)   2   (NULL) of    (NULL) and   (NULL)"cr$;
  14. 70 [153]x$[170]"-tantantantantantantan(NULL)tantantantantantantan(NULL)tantantantantantantan<"cr$;
  15. 80 [153]x$[170]"(NULL)   3   (NULL) and   (NULL) ing   (NULL)"cr$;
  16. 90 [153]x$[170]"-tantantantantantantan(NULL)tantantantantantantan(NULL)tantantantantantantan<"cr$;
  17. 100 [153]x$[170]"(NULL)   4   (NULL) to    (NULL) iun   (NULL)"cr$;
  18. 110 [153]x$[170]"-tantantantantantantan(NULL)tantantantantantantan(NULL)tantantantantantantan<"cr$;
  19. 120 [153]x$[170]"(NULL)   5   (NULL) a     (NULL) ent   (NULL)"cr$;
  20. 130 [153]x$[170]"-tantantantantantantan(NULL)tantantantantantantan(NULL)tantantantantantantan<"cr$;
  21. 140 [153]x$[170]"(NULL)   6   (NULL) in    (NULL) tio   (NULL)"cr$;
  22. 150 [153]x$[170]"-tantantantantantantan(NULL)tantantantantantantan(NULL)tantantantantantantan<"cr$;
  23. 160 [153]x$[170]"(NULL)   7   (NULL) that  (NULL) eop   (NULL)"cr$;
  24. 170 [153]x$[170]"-tantantantantantantan(NULL)tantantantantantantan(NULL)tantantantantantantan<"cr$;
  25. 180 [153]x$[170]"(NULL)   8   (NULL) is    (NULL) her   (NULL)"cr$;
  26. 190 [153]x$[170]"-tantantantantantantan(NULL)tantantantantantantan(NULL)tantantantantantantan<"cr$;
  27. 200 [153]x$[170]"(NULL)   9   (NULL) was   (NULL) ter   (NULL)"cr$;
  28. 210 [153]x$[170]"-tantantantantantantan(NULL)tantantantantantantan(NULL)tantantantantantantan<"cr$;
  29. 220 [153]x$[170]"(NULL)  10   (NULL) he    (NULL) ati   (NULL)"cr$;
  30. 230 [153]x$[170]"/tantantantantantantan>tantantantantantantan>tantantantantantantanexp"cr$;
  31. 300 [153]:[153]:[153]:[153]:[153]"              dvorak keyboard/maple/figure 2"
  32. 9999 [152]4:[160]4
  33.